﻿<!-- #include file="mymin.asp" -->
<%
Dim stdarticle,stdlist,stdtopic,stdpost
stdarticle="[center][b]{title}[/b][/center]{ad2}[div=odd]{content}[/div][div=even]发布：{time}[br]人气：{hit}[br]来源：{source}[br]分享：{weibo}[br]收藏：{keep}[/div][nav]※网友评论[/nav][div=odd]{discuss}[/div][nav]※快速评论[/nav]{input}{next}{prev}[nav]※相关内容[/nav]{rnd}{ad3}"
stdlist="{ad2}{list}[nav]※相关内容[/nav]{rnd}{ad3}"
stdtopic="{theme}[br]{post}[br]{ad4}{list}{admin}"
stdpost="[center][b]{title}[/b][/center]{ad5}[div=odd]{content}[/div][div=even]作者：{source}[br]签名：{sign}[br]人气：{hit}[br]发布：{time}[br]修改：{lasttime}[br]分享：{weibo}[br]收藏：{keep}[/div]{admin}[br][div=odd]{discuss}[br]{input}[/div]"

If Request("submit") <> "" Then
Dim act
act = Request.querystring("act")

Select Case act
	Case "art":tplArticle=forQuote(Request.Form("tplArticle"))
	Case "list":tplList=forQuote(Request.Form("tplList"))
	Case "topic":tplTopic=forQuote(Request.Form("tplTopic"))
	Case "post":tplPost=forQuote(Request.Form("tplPost"))
End Select


'----------------------------------------------------------------
'	生成layout.asp文件
'----------------------------------------------------------------
dim HU_Config,HU_File

HU_File= "../../config/tpl.asp"'生成bbs.asp文件路径

HU_Config="<"&"%"
HU_Config=HU_Config+chr(13)&chr(10)&"tplArticle="""&tplArticle&""""
HU_Config=HU_Config+chr(13)&chr(10)&"tplList="""&tplList&""""
HU_Config=HU_Config+chr(13)&chr(10)&"tplTopic="""&tplTopic&""""
HU_Config=HU_Config+chr(13)&chr(10)&"tplPost="""&tplPost&""""
HU_Config=HU_Config+chr(13)&chr(10)&"%"&">"
Call savetofile(HU_Config,HU_File)

Response.Write "<card id='card2' title='正在返回' ontimer='index.asp?sid="&sid&"'><timer value='10'/><p>"
Response.Write "成功设置！正在返回..."
else%>
<card id="index" title="网站布局配置">
<p align="left">
文章页:<input name="tplArticle<%=time_r%>" type="text" value="<%=tplArticle%>"/>
<anchor>保存
<go href="layout.asp?submit=true&amp;sid=<%=sid%>&amp;act=art" method="post">
<postfield name="tplArticle" value="$(tplArticle<%=time_r%>)"/>
</go></anchor>
<anchor>恢复
<go href="layout.asp?submit=true&amp;sid=<%=sid%>&amp;act=art" method="post">
<postfield name="tplArticle" value="<%=stdarticle%>"/>
</go></anchor>
<br/>
文章列表:<input name="tplList<%=time_r%>" type="text" value="<%=tplList%>"/>
<anchor>保存
<go href="layout.asp?submit=true&amp;sid=<%=sid%>&amp;act=list" method="post">
<postfield name="tplList" value="$(tplList<%=time_r%>)"/>
</go></anchor>
<anchor>恢复
<go href="layout.asp?submit=true&amp;sid=<%=sid%>&amp;act=list" method="post">
<postfield name="tplList" value="<%=stdlist%>"/>
</go></anchor>
<br/>
论坛页:<input name="tplTopic<%=time_r%>" type="text" value="<%=tplTopic%>"/>
<anchor>保存
<go href="layout.asp?submit=true&amp;sid=<%=sid%>&amp;act=topic" method="post">
<postfield name="tplTopic" value="$(tplTopic<%=time_r%>)"/>
</go></anchor>
<anchor>恢复
<go href="layout.asp?submit=true&amp;sid=<%=sid%>&amp;act=topic" method="post">
<postfield name="tplTopic" value="<%=stdtopic%>"/>
</go></anchor>
<br/>
帖子页:<input name="tplPost<%=time_r%>" type="text" value="<%=tplPost%>"/>
<anchor>保存
<go href="layout.asp?submit=true&amp;sid=<%=sid%>&amp;act=post" method="post">
<postfield name="tplPost" value="$(tplPost<%=time_r%>)"/>
</go></anchor>
<anchor>恢复
<go href="layout.asp?submit=true&amp;sid=<%=sid%>&amp;act=post" method="post">
<postfield name="tplPost" value="<%=stdpost%>"/>
</go></anchor>
<br/>
支持<a href="../ubbcl.asp?sid=<%=sid%>">UBB语言</a><br/>
<%end if%><br/>
<a href="index.asp?sid=<%=sid%>">[网站配置]</a><%call Last%>